home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1997 October: Mac OS SDK / Dev.CD Oct 97 SDK1.toast / Development Kits (Disc 1) / Interfaces&Libraries / Universal / Interfaces / PInterfaces / DriverSynchronization.p < prev    next >
Encoding:
Text File  |  1997-08-12  |  2.5 KB  |  79 lines  |  [TEXT/MPS ]
  1. {
  2.      File:        DriverSynchronization.p
  3.  
  4.      Contains:    Driver Synchronization Interfaces.
  5.  
  6.      Version:    Technology:    MacOS
  7.                  Release:    Universal Interfaces 3.0.1
  8.  
  9.      Copyright:    © 1985-1997 by Apple Computer, Inc., all rights reserved
  10.  
  11.      Bugs?:        Please include the the file and version information (from above) with
  12.                  the problem description.  Developers belonging to one of the Apple
  13.                  developer programs can submit bug reports to:
  14.  
  15.                      devsupport@apple.com
  16.  
  17. }
  18. {$IFC UNDEFINED UsingIncludes}
  19. {$SETC UsingIncludes := 0}
  20. {$ENDC}
  21.  
  22. {$IFC NOT UsingIncludes}
  23.  UNIT DriverSynchronization;
  24.  INTERFACE
  25. {$ENDC}
  26.  
  27. {$IFC UNDEFINED __DRIVERSYNCHRONIZATION__}
  28. {$SETC __DRIVERSYNCHRONIZATION__ := 1}
  29.  
  30. {$I+}
  31. {$SETC DriverSynchronizationIncludes := UsingIncludes}
  32. {$SETC UsingIncludes := 1}
  33.  
  34. {$IFC UNDEFINED __CONDITIONALMACROS__}
  35. {$I ConditionalMacros.p}
  36. {$ENDC}
  37. {$IFC UNDEFINED __TYPES__}
  38. {$I Types.p}
  39. {$ENDC}
  40.  
  41.  
  42. {$PUSH}
  43. {$ALIGN MAC68K}
  44. {$LibExport+}
  45.  
  46. PROCEDURE SynchronizeIO; C;
  47. FUNCTION CompareAndSwap(oldVvalue: UInt32; newValue: UInt32; VAR OldValueAdr: UInt32): BOOLEAN; C;
  48. FUNCTION TestAndClear(bit: UInt32; VAR startAddress: UInt8): BOOLEAN; C;
  49. FUNCTION TestAndSet(bit: UInt32; VAR startAddress: UInt8): BOOLEAN; C;
  50. FUNCTION IncrementAtomic8(VAR value: SInt8): SInt8; C;
  51. FUNCTION DecrementAtomic8(VAR value: SInt8): SInt8; C;
  52. FUNCTION AddAtomic8(amount: SInt32; VAR value: SInt8): SInt8; C;
  53. FUNCTION BitAndAtomic8(mask: UInt32; VAR value: UInt8): ByteParameter; C;
  54. FUNCTION BitOrAtomic8(mask: UInt32; VAR value: UInt8): ByteParameter; C;
  55. FUNCTION BitXorAtomic8(mask: UInt32; VAR value: UInt8): ByteParameter; C;
  56. FUNCTION IncrementAtomic16(VAR value: SInt16): SInt16; C;
  57. FUNCTION DecrementAtomic16(VAR value: SInt16): SInt16; C;
  58. FUNCTION AddAtomic16(amount: SInt32; VAR value: SInt16): SInt16; C;
  59. FUNCTION BitAndAtomic16(mask: UInt32; VAR value: UInt16): UInt16; C;
  60. FUNCTION BitOrAtomic16(mask: UInt32; VAR value: UInt16): UInt16; C;
  61. FUNCTION BitXorAtomic16(mask: UInt32; VAR value: UInt16): UInt16; C;
  62. FUNCTION IncrementAtomic(VAR value: SInt32): SInt32; C;
  63. FUNCTION DecrementAtomic(VAR value: SInt32): SInt32; C;
  64. FUNCTION AddAtomic(amount: SInt32; VAR value: SInt32): SInt32; C;
  65. FUNCTION BitAndAtomic(mask: UInt32; VAR value: UInt32): UInt32; C;
  66. FUNCTION BitOrAtomic(mask: UInt32; VAR value: UInt32): UInt32; C;
  67. FUNCTION BitXorAtomic(mask: UInt32; VAR value: UInt32): UInt32; C;
  68.  
  69. {$ALIGN RESET}
  70. {$POP}
  71.  
  72. {$SETC UsingIncludes := DriverSynchronizationIncludes}
  73.  
  74. {$ENDC} {__DRIVERSYNCHRONIZATION__}
  75.  
  76. {$IFC NOT UsingIncludes}
  77.  END.
  78. {$ENDC}
  79.